(edt-emulation-on): system-type is a symbol.

diff --git a/lisp/emulation/edt.el b/lisp/emulation/edt.el
index e4c6ba9ed38efdaaf6e9758c67b1317e13402dbf..46ab958d17b1d906fcf04e47a450189dd86f3269 100644 (file)
--- a/lisp/emulation/edt.el
+++ b/lisp/emulation/edt.el
@@ -1482,7 +1482,7 @@ If FILE is nil, try to load a default file.  The default file names are
   "Turn on EDT Emulation."
   (interactive)
   ;; If using MS-DOS, need to load edt-pc.el
-  (if (string-equal system-type "ms-dos")
+  (if (eq system-type 'ms-dos)
       (setq edt-term "pc")
     (setq edt-term (getenv "TERM")))
   ;; All DEC VT series terminals are supported by loading edt-vt100.el